LS
N = 15
PRINT "Massiv: ";
DIM M(N)
FOR I = 1 TO N
M(I) = INT(RND * 100)
PRINT M(I) ;
NEXT I
MIN=M(1)
FOR I = 2 TO N
IF MIN > M(I) THEN MIN=M(I)
NEXT I
PRINT
PRINT "_________"
PRINT "Minimum = "; MIN
Тестирование выполнено в программе QB64 ( Скачать )